1 REM find max num
10 READ A
20 N = 0

30 READ B

40 IF B <= A THEN 60
50 A = B
60 N = N + 1 

70 IF N < 9 THEN 30

80 PRINT "MAX = ";A
90 DATA 30,20,19,56,45,43,78,52,65,28

100 END